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TITL ODONE = POST REQUEST DONE TO USER 
Ident 'YOes500" - 
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ALL RIGHTS RESERVED. 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
eePORAT ite NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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FACILITY: 
ABSTRACT: 

THIS ROUTINE POSTS 1/0 COMPLETION FOR THE INDICATED FCP REQUEST. 
ENVIRONMENT : 


STARLET OPERATING SYSTEM, INCLUDING PRIVILEGED SYSTEM SERVICES 
AND ioe EXEC ROUTINES. THIS ROUTINE MUST BE CALLED IN 


FIITACP STRUCTURE LEVEL 2 


KERNEL MO) 
AUTHOR: ANDREW C. GOLDSTEIN, CREATION DATE: 20-DEC-1976 11:25 
MODIFIED BY: 
v03-010 CdS0005 Christian D. Saether 21-Aug-1984 
Ca’ l CHECK_DISMOUNT routine before posting i/o 
comple tion: 
v03-009 DASO001 David Solomon 02-May-1984 
Fix truncation error. 
v03-008 ACG0408 Andrew C. Goldstein, 23-Mar-1984 10:58 


Make ail of global storage based 
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= POST REQUEST DONE TO USER 15-SEP-1984 23:43: AX/VMS Macro v04-00 P 
a Seeni8ks Bistsiog PP TAN SACs fo80Ne mass 1 ae Of) 

28 v03-007 4 ed Wayne Cordose 14-Mar-1984 

This routine must call POSTEF because of changes in IOPOST. 
e} V03-006 €DS0004 Christian D. Saether 15-Jan-1984 
4 Call to IOC$_BUFPOST should be IOCS$BUFPOST. 
tz v03-005 CDdS0003 Christian D. Saether 8-Dec-1983 


For buffered i/o completion, execute iopost as 
jsb's to appropriate routines rather than actually 
post a software interrupt. 


v03-004 ¢dS0002 Christian D. Saether 24-Apr-1983 
Fix truncation error. 
v03-003 ACG0320 Andrew ¢. Goldstein, 22-Mar-1983 12:41 
Change byte count handling to track IOPOST changes 
v03-002 RSHO013 R. Scott Hanna 17-Mar-1983 


Fix truncation error. 


v03-001 CDS0001 


C Saether 31-Jul-1982 
Make reference to IOCS$GL_PSBL pic. 
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0 v02-001 LJK0076 Lawrence J. Kenah 3-Nov-1981 
0 Remove check for ‘‘queve previously not empty'’ when making 
; software interrupt request. The request is always made. 
00 et 
00 


: EQUATED SYMBOLS: 
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0 

00000004 9 PACKET =4 ; ADDRESS OF 1/0 PACKET ARG 
0 SABDDEF ; DEFINE BUFFER PACKET OFFSETS 
0 SACBDEF : AST CONTROL BLOCK OFFSETS 
0 $F IBDEF : DEFINE FIB OFFSETS 
0 SIRPDEF + DEFINE 1/0 PACKET OFFSETS 
0 SUCBDEF : DEFINE UCB OFFSETS 
6 SVCBDEF : DEFINE VCB OFFSETS 

SIPLDEF + DEFINE IPL SYMBOLS 

9 SIODEF + DEFINE 1/0 FUNCTION CODES 
0 SPRDEF > DEFINE PROCESSOR REGISTERS 
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FUNCTIONAL DESCRIPTION: 
THIS ROUTINE POSTS 1/0 COMPLETION FOR THE INDICATED FCP REQUEST. 


CALLING SEQUENCE: 
CALL IODONE (ARG1) 


INPUT PARAMETERS: 
ARG1: ADDRESS OF 1/0 PACKET 


IMPLICIT INPUTS: 
USER_STATUS: STATUS OF I/0 REQUEST 


OUTPUT PARAMETERS: 
NONE 
IMPLICIT OUTPUTS: 
IOCSGL_PSBL: TAIL OF 1/0 POST QUEUE 
ROUTINE VALUE: 
NONE 
SIDE EFFECTS: 


1/0 PACKET PLACED ON I/0 POST QUEUE 
VOLUME CHECKED FOR DISMOUNT 


-PSECT SCODES,NOWRT,LONG 
10_DONE: : 


me a a a at a a a 8 ee tt td 


PPV PUPP BBP BS BB BB BE ENA I NII AI RIPON NINIMPOPUDY 2 2 PO OO OO 


US ete 25 Don WO aD 2 OOOO OLA PUTO DOS MO Ute Uae OO AMF UNIO Doe Roe 


“WORD “M<R2,R3,R4,R5,R6,R7>  ; SAVE REGISTERS 
Y MOVL  PACKET(AP) : GET PACKET ADDRESS 
D MOVG  W*USER_STATUS(R10) ,IRPSL_MEDIACRS) ; SET STATUS IN PACKET 
EF oC EXTZV #IRPSV-FCODE ,#IRPSS_FCODE,- 
57 20A F RPSW_FUNC(RS) ,R7 ; GET FUNCTION CODE WITHOUT QUALIFIERS 
oc 3 4 18 cree LH #10$_READPBLK : IF READ PHYSICAL 
08 5 91 001 CMPB sR? #@10$_WRITEPBLK : OR WRITE DO SPECIAL PROCESSING 
0 13 A BEQL 208 
1¢ : POST PROCESSING FOR ALL ACP FUNCTIONS: BUMP DOWN THE VOLUME TRANSACTION 
oie + COUNT AND DO THE FIXUPS FOR THE BUFFER PACKET. 
56 1¢ AS) DO 1 MOVL —IRPSL_UCB(RS) .R6 ; GET UCB ADDRESS 
6 rv; 00 MOVL  UCBSLVCB(R6) .R6 : TO GET VCB ADDRESS 
C 8 4 DECW VCBSW~ TRANS (RG) : DEDUCT THIS REQ FROM TRANS COUN 
2a 2A AS. O03 sé? 7 BBC #IRPSU_COMPLX, IRPSW_STS(RS),10$ ; BRANCH IF NO BUFFER PACKET 
6 2 B85 00 MOVL  @IRPSLSVAPTE(RS).RS — ; GET BUFFER DESCRIPTOR ADDRE 
A6 Be CLRW © <ABDSC “NAME ®ABDS$C_LENGTH>+ABD$SW_ COUNT (RO) 
; INHIBIT WRITE-BACK OF NAME STRING | 
52 08 9E VA cABDs¢ F IB*ABDSC_LENGTH>+ABD$W_TEXT(R6) ,R2 | 
5 3¢ MOVZWL (R2),R3 ; OFFSET ADORESS OF FIB IN PACKET 50 
g A ADDL RB Re : ug ABSOLUTE ADDRESS 
00 0000°CA 08F 2 D MOVCS  #F{1BSC_LENGTH,W*LOCAL_FIB(R10) ,#0,- 
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PACKET CAP) Bs F 
#IRPSV_FUNC, IRPSW_STS(RSS 
#ABDSC-ATTRIB, IRPSW_BCNT(R 


@meo 
Ovo 


MOVL 
BBSS 
MOV 


PAA MTA 


~ Fr Cro 
w o~—mm NSNYNIDDOAAAPAAAINMS OO 


~~ 
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2s 


DS 


EO 10$: BBC #IRPSV_BUFIO, IRPSW_STS(RS 
‘ . 

FB OC CALLS #0 CHECK DISMOUNT ; 

D5 00 TSTL {Re L_PID TRS) : 

19 00 BLSS 0$ ; 

D0 00 MOVL  G*CTLSGL_PCB, R4 ; 
00 SETIPL #IPL$_ASTDEL 

16 00 J$B G*10CSBUF POST 

p0 D0 MOVL IRPSL_PID(R5),R1 

ee MOV ZBL IRPSB-EFN(RS) RS 


G*SCHSPOSTEF 
@ACBSL_KAST (RS) 


JSB 
SETIPL 
RET 
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<ABDSC_F IB*ABDSC_LENGTH>+ABD$W_COUNT(R6),1(R2) 


:0¢ yervee Macro V04-00 
: F11X.SRCJIODONE .MAR; 1 (2) 


COPY LOCAL FIB B 
1 ae IRP ADDR 
10$ ;_ IF READ BI 
5) ; ELSE DUMP ATT 


“oO 


; POST COMPLETION WITHOUT ACTUALLY POSTING AN IOPOST SOFTWARE INTERRUPT. 


: mae HAD BETTER BE A 


$ 
RED 1/0. 

THE VOLUME FOR DISMOUNT 
GATIVE, THIS DOES SPECIAL 
T PROCESSING. 


OUR PCB ADDRESS INTO R4. 
BLOCK AST DELIVERY 

DO FIRST PART OF IOPOST 
PROCESS IDENTIFICATION 
GET tery FLAG NUMBER 


AND PO 

DO SPECIAL KERNEL AST PART OF IOPOST. 
BACK TO IPL 0. 

AND EX] 


VIRTUAL BIT_IN THE PACKET. ONLY 


ERE, AND WE DON'T WANT TO SEE THEM AGAIN (1/0 POST 


5) ; CLEAR THE VIRTUAL BIT 
GET ADDRESS OF BACK LINK 


; INSERT PACKET INTO QUEUE 
; SIGNAL 1/0 POST INTERRUPT 


BUFFERED 1/0 WAS EXPECTED. 


C 3 
D08C > FOR READ/WRITE PHYSICAL, KNOCK DOWN THE 
C ; ERRORS COME THROUGH HERE, 
¢ ; RECYCLES VIRTUAL 1/0 ERRORS FOR ACP ERROR PROCESSING). 
C . ASSUME IRPSV_VIRTUAL LE 7 
aa aC 20$: BICB #IRPSA_VIRTUAL, IRPSW_STS(R 
9E 30$: MOVAB GJOCSGL PSBL. RO ; 
OE INSQUE (R5), a(RO) 
98 SOFTINT #IPL$_IOPOST 
04 009¢ RET 
‘ 
oF 50$: BUG_CHECK XOQPERR ; 
.END 
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PCB eeeeeres KX 02 
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—E 2 
ODONE = POST REQUEST DONE TO USER 1 -1 AX/VMS Macro v04-00 Pa 
— synopsis a= $fF- 198¢ 83: 13; $¢ F11X.§RC510DONE ONE .MAR; 1 . (8) 
bao mew ara ne cane sre se & 
! Psect synopsis ! 
Canam anemaecaomaaa > 
PSECT name Allocation PSECT No. Attributes 
~ > ( ) ( 0.) NOPIC USR CON ABS LCL —— NOEXE NORD WNOWRT NOVEC BYTE 
$s ( 2) 01 ¢ }.) NOPIC USR CON ABS LCL NO EXE RD WRT NOVEC BYTE 
SCODES OAS ( 1635.) 02 ¢ 2.) NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC LONG 
ro | 
: Performance indicators : 
Phase Page faults CPU Time Elapsed Time 
Initialization 29 : 0068 0:00:00.6 
ponnene processing 1 - : 00:6 3: ; § 
Synbol table sort :00: -! i 3: $i 
a? table output : ‘4 
Psect synopsis output : 9 3938 
Cross-reference output : 0:9 Be 
Assembler run totals 56 71 


ine working set Limit was 1350 pages. 

66502 bytes (150 pages) of virtual memory were used to buffer the intermediate code. 

There were 80 pages of symbol table space me eeeree to hold 1366 non-local and 4 Local symbols. 

3 source Lines were read in Pass 1, producing 13 object records in Pass 2. 
2 pages of virtual memory were used to define 21 macros. 


bree ew em me Cer ee meme wm mere } 


! Macro Library statistics ! 


peewee s were nner eee wey 


Macro Library name Macros defined 
SYS.OBJJLIB.M 9 
$538 SDUADB: SYSLIBISTARLET Thue: 2 ? 
TOTALS (all Libraries) 16 


1453 GETS were required to define 16 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$: IODONE/OBJ=0BJ$: 1ODONE MSRC$:F CPPRE/UPDATE=(ENHS:F CPPRE) +MSRC$: IODONE/UPDATE=(ENHS$: IODONE) +EXECMLS/LIB 


Men Wee enero Mak oe. 
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